home *** CD-ROM | disk | FTP | other *** search
/ El Mac 9 / El Mac 9.iso / Shareware / Applications / MathPad 2.4 / XFuns / readsnd / readsnd.rsrc / TEXT_128_readsnd().txt next >
Encoding:
Text File  |  1996-04-15  |  383 b   |  8 lines
  1. ----- readsnd("fname")
  2. -- Read data from the system 7 sampled sound file "fname" into the global array "samples". Returns the sample rate. Sample values range from 0 to 255.
  3. -- (To try this example, option drag the "Wild Eep" sound from your system suitcase).
  4.  
  5.  rate:=readsnd("Wild Eep"):;     rate:11127.2727
  6.   Xmin=0;   Xmax=count(samples)/rate;   Xlabel="sec"
  7.   plotline samples
  8.